<%

class class_View
	
	private path_
	
	public property let Path(value)
		path_ = value
	end property

	public default sub RenderView(controllerName, viewName)
		dim root
		root = include.RootDir
		include.RootDir = path_
		include controllerName & "/" & viewName & ".asp"
		include.RootDir = root
	end sub 

end class

%>